# NOT RUN {
ps <- VectorDistribution$new(
distribution = "Binomial",
params = data.table::data.table(prob = c(0.1, 0.6, 0.2), size = c(2, 4, 6))
)$parameters()
ps["Binom1__prob"] # extracts just Binom1__prob
ps["Binom1__prob", prefix = "Binom1"] # extracts Binom1__prob and removes prefix
ps["Binom1__"] # extracts all Binom1 parameters and removes prefix
# }
Run the code above in your browser using DataLab